home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1990-10-24 | 9.5 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| file
| data
| default
| |
| 100%
| xdgMime
| image/x-tga
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 1d 20 f4 3e 3c | 53 6f 6c 76 65 72 24 44 |.... .><|Solver$D|
|00000010| 69 72 3e 2e 21 52 75 6e | 49 6d 61 67 65 0d 00 14 |ir>.!Run|Image...|
|00000020| 34 20 f4 20 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |4 . ----|--------|
|00000030| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000040| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000050| 2d 0d 00 1e 20 20 f4 20 | 21 53 6f 6c 76 65 72 20 |-... . |!Solver |
|00000060| 31 31 74 68 20 4f 63 74 | 6f 62 65 72 20 31 39 39 |11th Oct|ober 199|
|00000070| 33 0d 00 28 18 20 f4 20 | 42 79 20 44 61 76 69 64 |3..(. . |By David|
|00000080| 20 42 72 61 64 73 68 61 | 77 0d 00 32 1d 20 f4 20 | Bradsha|w..2. . |
|00000090| a9 20 41 63 6f 72 6e 20 | 43 6f 6d 70 75 74 69 6e |. Acorn |Computin|
|000000a0| 67 20 31 39 39 33 0d 00 | 3c 34 20 f4 20 2d 2d 2d |g 1993..|<4 . ---|
|000000b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000000c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000000d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 00 46 1e 20 f4 |--------|--..F. .|
|000000e0| 20 44 65 64 69 63 61 74 | 65 64 20 74 6f 20 53 61 | Dedicat|ed to Sa|
|000000f0| 72 61 68 20 43 6f 6c 65 | 0d 00 50 34 20 f4 20 2d |rah Cole|..P4 . -|
|00000100| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000110| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000120| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 00 5a 3b |--------|----..Z;|
|00000130| 20 f4 20 54 68 65 20 61 | 75 74 68 65 72 20 6d 61 | . The a|uther ma|
|00000140| 79 20 62 65 20 63 6f 6e | 74 61 63 74 65 64 20 61 |y be con|tacted a|
|00000150| 74 20 74 68 65 20 66 6f | 6c 6f 77 69 6e 67 20 61 |t the fo|lowing a|
|00000160| 64 64 72 65 73 73 3a 0d | 00 64 15 20 f4 20 20 4d |ddress:.|.d. . M|
|00000170| 72 20 44 20 42 72 61 64 | 73 68 61 77 0d 00 6e 36 |r D Brad|shaw..n6|
|00000180| 20 f4 20 20 32 30 20 44 | 6f 77 6e 69 6e 67 20 43 | . 20 D|owning C|
|00000190| 72 65 73 63 65 6e 74 2c | 20 20 42 6f 74 74 65 73 |rescent,| Bottes|
|000001a0| 66 6f 72 64 2c 20 20 53 | 63 75 6e 74 68 6f 72 70 |ford, S|cunthorp|
|000001b0| 65 2c 0d 00 78 22 20 f4 | 20 20 20 53 6f 75 74 68 |e,..x" .| South|
|000001c0| 20 48 75 6d 62 65 72 73 | 69 64 65 20 44 4e 31 36 | Humbers|ide DN16|
|000001d0| 20 33 4c 53 0d 00 82 34 | 20 f4 20 2d 2d 2d 2d 2d | 3LS...4| . -----|
|000001e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000001f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000200| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 00 8c 08 20 f4 20 15 |--------|.... . .|
|00000210| 0d 00 96 36 20 ee 85 20 | f2 72 65 70 6f 72 74 65 |...6 .. |.reporte|
|00000220| 72 72 6f 72 28 30 2c f6 | 24 2b 22 20 2d 20 69 6e |rror(0,.|$+" - in|
|00000230| 74 65 72 6e 61 6c 20 63 | 6f 64 65 20 22 2b c3 28 |ternal c|ode "+.(|
|00000240| 9e 29 2c 2d 31 29 0d 00 | a0 0c 20 65 6e 74 65 72 |.),-1)..|.. enter|
|00000250| 3d a3 0d 00 aa 0d 20 de | 20 6e 65 67 28 33 29 0d |=..... .| neg(3).|
|00000260| 00 b4 12 20 63 75 72 72 | 65 6e 74 6d 65 6e 75 3d |... curr|entmenu=|
|00000270| 30 0d 00 be 0a 20 46 24 | 3d 22 22 0d 00 c8 10 20 |0.... F$|="".... |
|00000280| de 20 62 6c 6f 63 6b 20 | 31 30 30 0d 00 d2 0e 20 |. block |100.... |
|00000290| de 20 65 71 28 32 2c 32 | 29 0d 00 dc 11 20 de 20 |. eq(2,2|).... . |
|000002a0| 69 6e 66 6f 6d 25 20 32 | 30 30 0d 00 e6 12 20 57 |infom% 2|00.... W|
|000002b0| 69 6e 64 53 69 7a 65 3d | 31 30 30 30 0d 00 f0 30 |indSize=|1000...0|
|000002c0| 20 de 20 77 69 6d 70 5f | 62 6c 6f 63 6b 25 20 32 | . wimp_|block% 2|
|000002d0| 31 30 30 30 2c 69 6e 64 | 25 20 57 69 6e 64 53 69 |1000,ind|% WindSi|
|000002e0| 7a 65 2c 69 62 6c 6b 25 | 20 32 30 30 0d 00 fa 12 |ze,iblk%| 200....|
|000002f0| 20 de 20 67 73 70 61 63 | 65 20 31 30 30 30 0d 01 | . gspac|e 1000..|
|00000300| 04 11 20 62 75 66 66 25 | 3d 67 73 70 61 63 65 0d |.. buff%|=gspace.|
|00000310| 01 0e 0f 20 de 20 62 75 | 66 66 20 35 30 30 0d 01 |... . bu|ff 500..|
|00000320| 18 0e 20 de 20 74 61 73 | 6b 25 20 35 0d 01 22 10 |.. . tas|k% 5..".|
|00000330| 20 de 20 6d 65 6e 75 25 | 20 33 30 30 0d 01 2c 0f | . menu%| 300..,.|
|00000340| 20 de 20 61 63 63 25 20 | 33 30 30 0d 01 36 10 20 | . acc% |300..6. |
|00000350| de 20 72 61 64 69 6f 20 | 31 30 30 0d 01 40 13 20 |. radio |100..@. |
|00000360| de 20 73 62 6c 6f 63 6b | 20 34 30 30 30 30 0d 01 |. sblock| 40000..|
|00000370| 4a 12 20 21 73 62 6c 6f | 63 6b 3d 34 30 30 30 30 |J. !sblo|ck=40000|
|00000380| 0d 01 54 43 20 c8 99 22 | 4f 53 5f 53 70 72 69 74 |..TC .."|OS_Sprit|
|00000390| 65 4f 70 22 2c 32 36 36 | 2c 73 62 6c 6f 63 6b 2c |eOp",266|,sblock,|
|000003a0| 22 3c 53 6f 6c 76 65 72 | 24 44 69 72 3e 2e 52 65 |"<Solver|$Dir>.Re|
|000003b0| 73 6f 75 72 63 65 73 2e | 57 69 6e 53 70 72 69 74 |sources.|WinSprit|
|000003c0| 65 73 22 0d 01 5e 12 20 | 24 74 61 73 6b 25 3d 22 |es"..^. |$task%="|
|000003d0| 54 41 53 4b 22 0d 01 68 | 15 20 77 73 3d 69 6e 64 |TASK"..h|. ws=ind|
|000003e0| 25 2b 57 69 6e 64 53 69 | 7a 65 0d 01 72 3b 20 c8 |%+WindSi|ze..r; .|
|000003f0| 99 22 57 69 6d 70 5f 49 | 6e 69 74 69 61 6c 69 73 |."Wimp_I|nitialis|
|00000400| 65 22 2c 32 30 30 2c 21 | 74 61 73 6b 25 2c 22 53 |e",200,!|task%,"S|
|00000410| 6f 6c 76 65 72 22 20 b8 | 20 2c 74 61 73 6b 68 61 |olver" .| ,taskha|
|00000420| 6e 64 6c 65 25 0d 01 7c | 28 20 c8 99 22 57 69 6d |ndle%..||( .."Wim|
|00000430| 70 5f 43 6c 61 69 6d 49 | 6e 74 65 72 66 61 63 65 |p_ClaimI|nterface|
|00000440| 22 2c 74 61 73 6b 68 61 | 6e 64 6c 65 25 0d 01 86 |",taskha|ndle%...|
|00000450| 3e 20 c8 99 22 57 69 6d | 70 5f 4f 70 65 6e 54 65 |> .."Wim|p_OpenTe|
|00000460| 6d 70 6c 61 74 65 22 2c | 2c 22 3c 53 6f 6c 76 65 |mplate",|,"<Solve|
|00000470| 72 24 44 69 72 3e 2e 52 | 65 73 6f 75 72 63 65 73 |r$Dir>.R|esources|
|00000480| 2e 54 65 6d 70 6c 61 74 | 65 73 22 0d 01 90 45 20 |.Templat|es"...E |
|00000490| c8 99 22 57 69 6d 70 5f | 4c 6f 61 64 54 65 6d 70 |.."Wimp_|LoadTemp|
|000004a0| 6c 61 74 65 22 2c 2c 77 | 69 6d 70 5f 62 6c 6f 63 |late",,w|imp_bloc|
|000004b0| 6b 25 2c 69 6e 64 25 2c | 77 73 2c 2d 31 2c 22 6d |k%,ind%,|ws,-1,"m|
|000004c0| 61 69 6e 22 2c 30 20 b8 | 20 2c 2c 6e 69 6e 64 25 |ain",0 .| ,,nind%|
|000004d0| 0d 01 9a 1a 20 77 69 6d | 70 5f 62 6c 6f 63 6b 25 |.... wim|p_block%|
|000004e0| 21 36 34 3d 73 62 6c 6f | 63 6b 0d 01 a4 2f 20 c8 |!64=sblo|ck.../ .|
|000004f0| 99 22 57 69 6d 70 5f 43 | 72 65 61 74 65 57 69 6e |."Wimp_C|reateWin|
|00000500| 64 6f 77 22 2c 2c 77 69 | 6d 70 5f 62 6c 6f 63 6b |dow",,wi|mp_block|
|00000510| 25 20 b8 20 6d 61 69 6e | 25 0d 01 ae 46 20 c8 99 |% . main|%...F ..|
|00000520| 22 57 69 6d 70 5f 4c 6f | 61 64 54 65 6d 70 6c 61 |"Wimp_Lo|adTempla|
|00000530| 74 65 22 2c 2c 77 69 6d | 70 5f 62 6c 6f 63 6b 25 |te",,wim|p_block%|
|00000540| 2c 6e 69 6e 64 25 2c 77 | 73 2c 2d 31 2c 22 69 6e |,nind%,w|s,-1,"in|
|00000550| 66 6f 22 2c 30 20 b8 20 | 2c 2c 6e 69 6e 64 25 0d |fo",0 . |,,nind%.|
|00000560| 01 b8 1a 20 77 69 6d 70 | 5f 62 6c 6f 63 6b 25 21 |... wimp|_block%!|
|00000570| 36 34 3d 73 62 6c 6f 63 | 6b 0d 01 c2 2f 20 c8 99 |64=sbloc|k.../ ..|
|00000580| 22 57 69 6d 70 5f 43 72 | 65 61 74 65 57 69 6e 64 |"Wimp_Cr|eateWind|
|00000590| 6f 77 22 2c 2c 77 69 6d | 70 5f 62 6c 6f 63 6b 25 |ow",,wim|p_block%|
|000005a0| 20 b8 20 69 6e 66 6f 25 | 0d 01 cc 1b 20 c8 99 22 | . info%|.... .."|
|000005b0| 57 69 6d 70 5f 43 6c 6f | 73 65 54 65 6d 70 6c 61 |Wimp_Clo|seTempla|
|000005c0| 74 65 22 0d 01 d6 19 20 | f2 6e 65 77 74 65 78 74 |te".... |.newtext|
|000005d0| 28 6d 61 69 6e 25 2c 33 | 2c 22 22 29 0d 01 e0 29 |(main%,3|,"")...)|
|000005e0| 20 f2 6e 65 77 74 65 78 | 74 28 6d 61 69 6e 25 2c | .newtex|t(main%,|
|000005f0| 35 2c 22 30 78 32 20 2b | 20 30 78 20 2b 20 30 20 |5,"0x2 +| 0x + 0 |
|00000600| 3d 20 30 22 29 0d 01 ea | 1e 20 f2 6e 65 77 74 65 |= 0")...|. .newte|
|00000610| 78 74 28 6d 61 69 6e 25 | 2c 37 2c 22 78 20 3d 20 |xt(main%|,7,"x = |
|00000620| 30 22 29 0d 01 f4 1e 20 | f2 6e 65 77 74 65 78 74 |0").... |.newtext|
|00000630| 28 6d 61 69 6e 25 2c 38 | 2c 22 78 20 3d 20 30 22 |(main%,8|,"x = 0"|
|00000640| 29 0d 01 fe 33 20 69 63 | 6f 6e 62 61 72 25 3d a4 |)...3 ic|onbar%=.|
|00000650| 69 63 6f 6e 62 61 72 28 | 22 21 73 6f 6c 76 65 72 |iconbar(|"!solver|
|00000660| 22 2c 69 62 6c 6b 25 2c | 22 53 6f 6c 76 65 72 22 |",iblk%,|"Solver"|
|00000670| 2c 2d 31 29 0d 02 08 40 | 20 61 63 63 25 3d a4 63 |,-1)...@| acc%=.c|
|00000680| 6f 6e 73 74 72 75 63 74 | 5f 6d 65 6e 75 28 61 63 |onstruct|_menu(ac|
|00000690| 63 25 2c 22 30 20 64 70 | 2c 32 20 64 70 2c 37 20 |c%,"0 dp|,2 dp,7 |
|000006a0| 64 70 2c 22 2c 22 41 63 | 63 75 72 61 63 79 22 2c |dp,","Ac|curacy",|
|000006b0| 31 35 30 29 0d 02 12 1b | 20 f2 74 69 63 6b 28 61 |150)....| .tick(a|
|000006c0| 63 63 25 2c 31 29 3a 64 | 70 3d 31 3a 70 3d 32 0d |cc%,1):d|p=1:p=2.|
|000006d0| 02 1c 57 20 6d 65 6e 75 | 25 3d a4 63 6f 6e 73 74 |..W menu|%=.const|
|000006e0| 72 75 63 74 5f 6d 65 6e | 75 28 6d 65 6e 75 25 2c |ruct_men|u(menu%,|
|000006f0| 22 3e 49 6e 66 6f 2c 69 | 6e 66 6f 25 2c 3e 41 63 |">Info,i|nfo%,>Ac|
|00000700| 63 75 72 61 63 79 2c 61 | 63 63 25 2c 48 65 6c 70 |curacy,a|cc%,Help|
|00000710| 21 2c 51 75 69 74 2c 22 | 2c 22 53 6f 6c 76 65 72 |!,Quit,"|,"Solver|
|00000720| 22 2c 32 30 30 29 0d 02 | 26 2a 20 c8 99 22 57 69 |",200)..|&* .."Wi|
|00000730| 6d 70 5f 50 6f 6c 6c 22 | 2c 30 2c 77 69 6d 70 5f |mp_Poll"|,0,wimp_|
|00000740| 62 6c 6f 63 6b 25 20 b8 | 20 61 63 74 69 6f 6e 25 |block% .| action%|
|00000750| 0d 02 30 2e 20 c8 99 22 | 57 69 6d 70 5f 50 6f 6c |..0. .."|Wimp_Pol|
|00000760| 6c 50 6f 69 6e 74 65 72 | 22 2c 61 63 74 69 6f 6e |lPointer|",action|
|00000770| 25 2c 2c 74 61 73 6b 68 | 61 6e 64 6c 65 25 0d 02 |%,,taskh|andle%..|
|00000780| 3a 11 20 c8 8e 20 61 63 | 74 69 6f 6e 25 20 ca 0d |:. .. ac|tion% ..|
|00000790| 02 44 09 20 c9 20 30 3a | 0d 02 4e 32 20 c9 20 31 |.D. . 0:|..N2 . 1|
|000007a0| 3a f2 72 65 64 72 61 77 | 5f 77 69 6e 64 6f 77 28 |:.redraw|_window(|
|000007b0| 77 69 6d 70 5f 62 6c 6f | 63 6b 25 21 30 2c 77 69 |wimp_blo|ck%!0,wi|
|000007c0| 6d 70 5f 62 6c 6f 63 6b | 25 29 0d 02 58 22 20 c9 |mp_block|%)..X" .|
|000007d0| 20 32 3a f2 6f 70 65 6e | 77 69 6e 64 6f 77 28 21 | 2:.open|window(!|
|000007e0| 77 69 6d 70 5f 62 6c 6f | 63 6b 25 29 0d 02 62 4e |wimp_blo|ck%)..bN|
|000007f0| 20 c9 20 33 3a e7 20 21 | 77 69 6d 70 5f 62 6c 6f | . 3:. !|wimp_blo|
|00000800| 63 6b 25 3d 6d 61 69 6e | 25 20 8c 20 f2 63 6c 6f |ck%=main|% . .clo|
|00000810| 73 65 6d 61 69 6e 3a 8b | 20 c8 99 22 57 69 6d 70 |semain:.| .."Wimp|
|00000820| 5f 43 6c 6f 73 65 57 69 | 6e 64 6f 77 22 2c 2c 77 |_CloseWi|ndow",,w|
|00000830| 69 6d 70 5f 62 6c 6f 63 | 6b 25 0d 02 6c 0c 20 c9 |imp_bloc|k%..l. .|
|00000840| 20 36 3a f2 63 6c 0d 02 | 76 0e 20 c9 20 38 3a f2 | 6:.cl..|v. . 8:.|
|00000850| 6b 65 79 73 0d 02 80 1d | 20 c9 20 39 3a f2 64 65 |keys....| . 9:.de|
|00000860| 63 6f 64 65 28 77 69 6d | 70 5f 62 6c 6f 63 6b 25 |code(wim|p_block%|
|00000870| 29 0d 02 8a 0c 20 c9 20 | 31 37 2c 31 38 0d 02 94 |).... . |17,18...|
|00000880| 19 20 20 c8 8e 20 77 69 | 6d 70 5f 62 6c 6f 63 6b |. .. wi|mp_block|
|00000890| 25 21 31 36 20 ca 0d 02 | 9e 0e 20 20 c9 20 30 3a |%!16 ...|.. . 0:|
|000008a0| f2 64 69 65 0d 02 a8 1d | 20 20 c9 20 26 35 30 32 |.die....| . &502|
|000008b0| 3a f2 73 65 6e 64 68 65 | 6c 70 6d 65 73 73 61 67 |:.sendhe|lpmessag|
|000008c0| 65 0d 02 b2 07 20 20 cb | 0d 02 bc 06 20 cb 0d 02 |e.... .|.... ...|
|000008d0| c6 0b 20 e5 20 8d 54 66 | 42 0d 02 d0 1d dd 20 f2 |.. . .Tf|B..... .|
|000008e0| 75 70 64 61 74 65 5f 77 | 69 6e 64 6f 77 28 68 61 |update_w|indow(ha|
|000008f0| 6e 64 6c 65 25 29 0d 02 | da 0a ea 6d 6f 72 65 25 |ndle%)..|...more%|
|00000900| 0d 02 e4 19 20 21 77 69 | 6d 70 5f 62 6c 6f 63 6b |.... !wi|mp_block|
|00000910| 25 3d 68 61 6e 64 6c 65 | 25 0d 02 ee 29 20 c8 99 |%=handle|%...) ..|
|00000920| 22 57 69 6d 70 5f 47 65 | 74 57 69 6e 64 6f 77 53 |"Wimp_Ge|tWindowS|
|00000930| 74 61 74 65 22 2c 2c 77 | 69 6d 70 5f 62 6c 6f 63 |tate",,w|imp_bloc|
|00000940| 6b 25 0d 02 f8 2f c8 99 | 20 22 57 69 6d 70 5f 55 |k%.../..| "Wimp_U|
|00000950| 70 64 61 74 65 57 69 6e | 64 6f 77 22 2c 2c 77 69 |pdateWin|dow",,wi|
|00000960| 6d 70 5f 62 6c 6f 63 6b | 25 20 b8 20 6d 6f 72 65 |mp_block|% . more|
|00000970| 25 0d 03 02 0c c8 95 20 | 6d 6f 72 65 25 0d 03 0c |%...... |more%...|
|00000980| 31 20 20 c8 99 20 22 57 | 69 6d 70 5f 47 65 74 52 |1 .. "W|imp_GetR|
|00000990| 65 63 74 61 6e 67 6c 65 | 22 2c 2c 77 69 6d 70 5f |ectangle|",,wimp_|
|000009a0| 62 6c 6f 63 6b 25 20 b8 | 20 6d 6f 72 65 25 0d 03 |block% .| more%..|
|000009b0| 16 05 ce 0d 03 20 05 e1 | 0d 03 2a 24 dd 20 f2 72 |..... ..|..*$. .r|
|000009c0| 65 64 72 61 77 5f 77 69 | 6e 64 6f 77 28 68 61 6e |edraw_wi|ndow(han|
|000009d0| 64 6c 65 25 2c 62 6c 6f | 63 6b 25 29 0d 03 34 14 |dle%,blo|ck%)..4.|
|000009e0| 20 21 62 6c 6f 63 6b 25 | 3d 68 61 6e 64 6c 65 25 | !block%|=handle%|
|000009f0| 0d 03 3e 24 20 c8 99 22 | 57 69 6d 70 5f 47 65 74 |..>$ .."|Wimp_Get|
|00000a00| 57 69 6e 64 6f 77 53 74 | 61 74 65 22 2c 2c 62 6c |WindowSt|ate",,bl|
|00000a10| 6f 63 6b 25 0d 03 48 0a | ea 6d 6f 72 65 25 0d 03 |ock%..H.|.more%..|
|00000a20| 52 2a c8 99 20 22 57 69 | 6d 70 5f 52 65 64 72 61 |R*.. "Wi|mp_Redra|
|00000a30| 77 57 69 6e 64 6f 77 22 | 2c 2c 62 6c 6f 63 6b 25 |wWindow"|,,block%|
|00000a40| 20 b8 20 6d 6f 72 65 25 | 0d 03 5c 0c c8 95 20 6d | . more%|..\... m|
|00000a50| 6f 72 65 25 0d 03 66 24 | 20 20 c8 99 20 22 57 69 |ore%..f$| .. "Wi|
|00000a60| 6d 70 5f 42 6f 72 64 65 | 72 57 69 6e 64 6f 77 22 |mp_Borde|rWindow"|
|00000a70| 2c 2c 62 6c 6f 63 6b 25 | 0d 03 70 2c 20 20 c8 99 |,,block%|..p, ..|
|00000a80| 20 22 57 69 6d 70 5f 47 | 65 74 52 65 63 74 61 6e | "Wimp_G|etRectan|
|00000a90| 67 6c 65 22 2c 2c 62 6c | 6f 63 6b 25 20 b8 20 6d |gle",,bl|ock% . m|
|00000aa0| 6f 72 65 25 0d 03 7a 05 | ce 0d 03 84 1c 20 f2 75 |ore%..z.|..... .u|
|00000ab0| 70 64 61 74 65 5f 77 69 | 6e 64 6f 77 28 68 61 6e |pdate_wi|ndow(han|
|00000ac0| 64 6c 65 25 29 0d 03 8e | 05 e1 0d 03 98 09 20 dd |dle%)...|...... .|
|00000ad0| f2 63 6c 0d 03 a2 0e 20 | 63 6c 69 63 6b 65 64 3d |.cl.... |clicked=|
|00000ae0| b9 0d 03 ac 16 20 6d 78 | 25 3d 77 69 6d 70 5f 62 |..... mx|%=wimp_b|
|00000af0| 6c 6f 63 6b 25 21 30 0d | 03 b6 16 20 6d 79 25 3d |lock%!0.|... my%=|
|00000b00| 77 69 6d 70 5f 62 6c 6f | 63 6b 25 21 34 0d 03 c0 |wimp_blo|ck%!4...|
|00000b10| 16 20 62 75 25 3d 77 69 | 6d 70 5f 62 6c 6f 63 6b |. bu%=wi|mp_block|
|00000b20| 25 21 38 0d 03 ca 17 20 | 77 69 25 3d 77 69 6d 70 |%!8.... |wi%=wimp|
|00000b30| 5f 62 6c 6f 63 6b 25 21 | 31 32 0d 03 d4 17 20 69 |_block%!|12.... i|
|00000b40| 63 25 3d 77 69 6d 70 5f | 62 6c 6f 63 6b 25 21 31 |c%=wimp_|block%!1|
|00000b50| 36 0d 03 de 15 20 e7 20 | 62 75 25 3d 32 20 8c 20 |6.... . |bu%=2 . |
|00000b60| e5 20 8d 54 46 44 0d 03 | e8 25 20 c8 99 22 57 69 |. .TFD..|.% .."Wi|
|00000b70| 6d 70 5f 42 6f 72 64 65 | 72 49 63 6f 6e 22 2c 2c |mp_Borde|rIcon",,|
|00000b80| 77 69 6d 70 5f 62 6c 6f | 63 6b 25 0d 03 f2 14 20 |wimp_blo|ck%.... |
|00000b90| 77 69 6d 70 5f 62 6c 6f | 63 6b 25 21 38 3d 30 0d |wimp_blo|ck%!8=0.|
|00000ba0| 03 fc 25 20 c8 99 22 57 | 69 6d 70 5f 42 6f 72 64 |..% .."W|imp_Bord|
|00000bb0| 65 72 49 63 6f 6e 22 2c | 2c 77 69 6d 70 5f 62 6c |erIcon",|,wimp_bl|
|00000bc0| 6f 63 6b 25 0d 04 06 0d | 20 c8 8e 20 77 69 25 20 |ock%....| .. wi% |
|00000bd0| ca 0d 04 10 09 20 c9 20 | 2d 32 0d 04 1a 0e 20 20 |..... . |-2.... |
|00000be0| c8 8e 20 62 75 25 20 ca | 0d 04 24 53 20 20 c9 20 |.. bu% .|..$S . |
|00000bf0| 34 3a 21 67 73 70 61 63 | 65 3d 6d 61 69 6e 25 3a |4:!gspac|e=main%:|
|00000c00| c8 99 22 57 69 6d 70 5f | 47 65 74 57 69 6e 64 6f |.."Wimp_|GetWindo|
|00000c10| 77 53 74 61 74 65 22 2c | 2c 67 73 70 61 63 65 3a |wState",|,gspace:|
|00000c20| c8 99 22 57 69 6d 70 5f | 4f 70 65 6e 57 69 6e 64 |.."Wimp_|OpenWind|
|00000c30| 6f 77 22 2c 2c 67 73 70 | 61 63 65 0d 04 2e 3a 20 |ow",,gsp|ace...: |
|00000c40| 20 c9 20 32 3a 20 f2 6d | 65 6e 75 5f 61 74 28 6d | . 2: .m|enu_at(m|
|00000c50| 65 6e 75 25 2c 30 2c 6d | 78 25 2d 31 30 30 2c 32 |enu%,0,m|x%-100,2|
|00000c60| 38 30 29 3a 63 75 72 72 | 65 6e 74 6d 65 6e 75 3d |80):curr|entmenu=|
|00000c70| 6d 65 6e 75 25 0d 04 38 | 06 20 cb 0d 04 42 0c 20 |menu%..8|. ...B. |
|00000c80| c9 20 6d 61 69 6e 25 0d | 04 4c 0e 20 20 c8 8e 20 |. main%.|.L. .. |
|00000c90| 62 75 25 20 ca 0d 04 56 | 0a 20 20 c9 20 31 3a 0d |bu% ...V|. . 1:.|
|00000ca0| 04 60 0f 20 20 20 c8 8e | 20 69 63 25 20 ca 0d 04 |.`. ..| ic% ...|
|00000cb0| 6a 0b 20 20 20 c9 20 39 | 3a 0d 04 74 08 20 20 20 |j. . 9|:..t. |
|00000cc0| cb 0d 04 7e 09 20 20 c9 | 20 32 0d 04 88 0f 20 20 |...~. .| 2.... |
|00000cd0| 20 c8 8e 20 69 63 25 20 | ca 0d 04 92 34 20 20 20 | .. ic% |....4 |
|00000ce0| 7f 20 f2 6d 65 6e 75 5f | 61 74 28 6d 65 6e 75 25 |. .menu_|at(menu%|
|00000cf0| 2c 30 2c 6d 78 25 2c 6d | 79 25 29 3a 63 75 72 72 |,0,mx%,m|y%):curr|
|00000d00| 65 6e 74 6d 65 6e 75 3d | 6d 65 6e 75 25 0d 04 9c |entmenu=|menu%...|
|00000d10| 08 20 20 20 cb 0d 04 a6 | 09 20 20 c9 20 34 0d 04 |. ....|. . 4..|
|00000d20| b0 0f 20 20 20 c8 8e 20 | 69 63 25 20 ca 0d 04 ba |.. .. |ic% ....|
|00000d30| 0b 20 20 20 c9 20 30 3a | 0d 04 c4 0b 20 20 20 c9 |. . 0:|.... .|
|00000d40| 20 31 3a 0d 04 ce 0b 20 | 20 20 c9 20 35 3a 0d 04 | 1:.... | . 5:..|
|00000d50| d8 0c 20 20 20 c9 20 31 | 31 3a 0d 04 e2 0c 20 20 |.. . 1|1:.... |
|00000d60| 20 c9 20 20 36 3a 0d 04 | ec 0c 20 20 20 c9 20 31 | . 6:..|.. . 1|
|00000d70| 34 3a 0d 04 f6 0c 20 20 | 20 c9 20 31 32 3a 0d 05 |4:.... | . 12:..|
|00000d80| 00 0c 20 20 20 c9 20 31 | 33 3a 0d 05 0a 0c 20 20 |.. . 1|3:.... |
|00000d90| 20 c9 20 31 39 3a 0d 05 | 14 08 20 20 20 cb 0d 05 | . 19:..|.. ...|
|00000da0| 1e 07 20 20 cb 0d 05 28 | 06 20 cb 0d 05 32 06 20 |.. ...(|. ...2. |
|00000db0| e1 0d 05 3c 0b 20 dd f2 | 6b 65 79 73 0d 05 46 31 |...<. ..|keys..F1|
|00000dc0| 20 e7 20 77 69 6d 70 5f | 62 6c 6f 63 6b 25 21 32 | . wimp_|block%!2|
|00000dd0| 34 3c 31 32 36 20 80 20 | 77 69 6d 70 5f 62 6c 6f |4<126 . |wimp_blo|
|00000de0| 63 6b 25 21 32 34 3e 33 | 31 20 8c 20 e1 0d 05 50 |ck%!24>3|1 . ...P|
|00000df0| 18 20 c8 8e 20 77 69 6d | 70 5f 62 6c 6f 63 6b 25 |. .. wim|p_block%|
|00000e00| 21 32 34 20 ca 0d 05 5a | 3b 20 20 c9 20 31 33 3a |!24 ...Z|; . 13:|
|00000e10| 65 6e 74 65 72 3d b9 3a | c8 99 22 57 69 6d 70 5f |enter=.:|.."Wimp_|
|00000e20| 53 65 74 43 61 72 65 74 | 50 6f 73 69 74 69 6f 6e |SetCaret|Position|
|00000e30| 22 2c 30 3a f2 67 65 74 | 65 71 75 61 74 69 6f 6e |",0:.get|equation|
|00000e40| 0d 05 64 0c 20 20 c9 20 | 33 38 36 3a 0d 05 6e 2a |..d. . |386:..n*|
|00000e50| 20 20 7f 20 c8 99 22 57 | 69 6d 70 5f 50 72 6f 63 | . .."W|imp_Proc|
|00000e60| 65 73 73 4b 65 79 22 2c | 77 69 6d 70 5f 62 6c 6f |essKey",|wimp_blo|
|00000e70| 63 6b 25 21 32 34 0d 05 | 78 06 20 cb 0d 05 82 06 |ck%!24..|x. .....|
|00000e80| 20 e1 0d 05 8c 0a 20 dd | f2 64 69 65 0d 05 96 28 | ..... .|.die...(|
|00000e90| 20 c8 99 22 57 69 6d 70 | 5f 50 6f 6c 6c 50 6f 69 | .."Wimp|_PollPoi|
|00000ea0| 6e 74 65 72 22 2c 34 2c | 2c 74 61 73 6b 68 61 6e |nter",4,|,taskhan|
|00000eb0| 64 6c 65 25 0d 05 a0 36 | 20 c8 99 22 57 69 6d 70 |dle%...6| .."Wimp|
|00000ec0| 5f 52 65 6c 65 61 73 65 | 49 6e 74 65 72 66 61 63 |_Release|Interfac|
|00000ed0| 65 22 2c 74 61 73 6b 68 | 61 6e 64 6c 65 25 2c 74 |e",taskh|andle%,t|
|00000ee0| 61 73 6b 68 61 6e 64 6c | 65 25 0d 05 aa 17 20 c8 |askhandl|e%.... .|
|00000ef0| 99 22 57 69 6d 70 5f 43 | 6c 6f 73 65 44 6f 77 6e |."Wimp_C|loseDown|
|00000f00| 22 0d 05 b4 06 20 e0 0d | 05 be 06 20 e1 0d 05 c8 |".... ..|... ....|
|00000f10| 12 20 dd f2 64 65 63 6f | 64 65 28 70 74 72 29 0d |. ..deco|de(ptr).|
|00000f20| 05 d2 15 20 c8 8e 20 63 | 75 72 72 65 6e 74 6d 65 |... .. c|urrentme|
|00000f30| 6e 75 20 ca 0d 05 dc 0c | 20 c9 20 6d 65 6e 75 25 |nu .....| . menu%|
|00000f40| 0d 05 e6 0e 20 c8 8e 20 | 21 70 74 72 20 ca 0d 05 |.... .. |!ptr ...|
|00000f50| f0 0a 20 20 c9 20 30 3a | 0d 05 fa 27 20 20 c9 20 |.. . 0:|...' . |
|00000f60| 31 3a 63 75 72 72 65 6e | 74 6d 65 6e 75 3d 61 63 |1:curren|tmenu=ac|
|00000f70| 63 25 3a f2 64 65 63 6f | 64 65 28 70 74 72 29 0d |c%:.deco|de(ptr).|
|00000f80| 06 04 28 20 20 c9 20 32 | 3a ff 22 57 69 6d 70 54 |..( . 2|:."WimpT|
|00000f90| 61 73 6b 20 3c 53 6f 6c | 76 65 72 24 44 69 72 3e |ask <Sol|ver$Dir>|
|00000fa0| 2e 21 48 65 6c 70 22 0d | 06 0e 0e 20 20 c9 20 33 |.!Help".|... . 3|
|00000fb0| 3a f2 64 69 65 0d 06 18 | 06 20 cb 0d 06 22 0b 20 |:.die...|. ...". |
|00000fc0| c9 20 61 63 63 25 0d 06 | 2c 0f 20 c8 8e 20 70 74 |. acc%..|,. .. pt|
|00000fd0| 72 21 34 20 ca 0d 06 36 | 46 20 c9 20 30 2c 31 2c |r!4 ...6|F . 0,1,|
|00000fe0| 32 3a f2 74 69 63 6b 28 | 61 63 63 25 2c 64 70 29 |2:.tick(|acc%,dp)|
|00000ff0| 3a 64 70 3d 70 74 72 21 | 34 3a e7 20 64 70 3d 30 |:dp=ptr!|4:. dp=0|
|00001000| 20 8c 20 70 3d 30 3a 8b | 20 e7 20 64 70 3d 31 20 | . p=0:.| . dp=1 |
|00001010| 8c 20 70 3d 32 3a 8b 20 | 70 3d 37 0d 06 40 13 20 |. p=2:. |p=7..@. |
|00001020| f2 74 69 63 6b 28 61 63 | 63 25 2c 64 70 29 0d 06 |.tick(ac|c%,dp)..|
|00001030| 4a 15 20 20 f2 64 69 73 | 70 6c 61 79 72 65 73 75 |J. .dis|playresu|
|00001040| 6c 74 73 0d 06 54 06 20 | cb 0d 06 5e 06 20 cb 0d |lts..T. |...^. ..|
|00001050| 06 68 06 20 e1 0d 06 72 | 16 20 dd f2 73 65 6e 64 |.h. ...r|. ..send|
|00001060| 68 65 6c 70 6d 65 73 73 | 61 67 65 0d 06 7c 35 20 |helpmess|age..|5 |
|00001070| 77 69 6d 70 5f 62 6c 6f | 63 6b 25 21 31 36 3d 26 |wimp_blo|ck%!16=&|
|00001080| 35 30 33 3a 77 69 6d 70 | 5f 62 6c 6f 63 6b 25 21 |503:wimp|_block%!|
|00001090| 31 32 3d 77 69 6d 70 5f | 62 6c 6f 63 6b 25 21 38 |12=wimp_|block%!8|
|000010a0| 0d 06 86 16 20 77 69 6d | 70 5f 62 6c 6f 63 6b 25 |.... wim|p_block%|
|000010b0| 21 30 3d 32 35 36 0d 06 | 90 3a 20 73 65 6e 64 68 |!0=256..|.: sendh|
|000010c0| 65 6c 70 24 3d 22 54 68 | 69 73 20 62 65 6c 6f 6e |elp$="Th|is belon|
|000010d0| 67 73 20 74 6f 20 53 6f | 6c 76 65 72 7c 4d 42 79 |gs to So|lver|MBy|
|000010e0| 20 44 20 42 72 61 64 73 | 68 61 77 7c 4d a9 20 22 | D Brads|haw|M. "|
|000010f0| 0d 06 9a 18 20 c8 8e 20 | 77 69 6d 70 5f 62 6c 6f |.... .. |wimp_blo|
|00001100| 63 6b 25 21 33 32 20 ca | 0d 06 a4 52 20 20 c9 20 |ck%!32 .|...R . |
|00001110| 69 6e 66 6f 25 3a 73 65 | 6e 64 68 65 6c 70 24 3d |info%:se|ndhelp$=|
|00001120| 22 54 68 69 73 20 69 73 | 20 74 68 65 20 53 6f 6c |"This is| the Sol|
|00001130| 76 65 72 20 69 6e 66 6f | 72 6d 61 74 69 6f 6e 20 |ver info|rmation |
|00001140| 77 69 6e 64 6f 77 7c 4d | 42 79 20 44 20 42 72 61 |window|M|By D Bra|
|00001150| 64 73 68 61 77 7c 4d a9 | 20 22 0d 06 ae 67 20 20 |dshaw|M.| "...g |
|00001160| c9 20 2d 32 3a 73 65 6e | 64 68 65 6c 70 24 3d 22 |. -2:sen|dhelp$="|
|00001170| 54 68 69 73 20 69 73 20 | 74 68 65 20 53 6f 6c 76 |This is |the Solv|
|00001180| 65 72 20 69 63 6f 6e 7c | 4d 43 6c 69 63 6b 20 53 |er icon||MClick S|
|00001190| 45 4c 45 43 54 20 66 6f | 72 20 74 68 65 20 6d 61 |ELECT fo|r the ma|
|000011a0| 69 6e 20 77 69 6e 64 6f | 77 7c 4d 43 6c 69 63 6b |in windo|w|MClick|
|000011b0| 20 4d 45 4e 55 20 66 6f | 72 20 61 20 6d 65 6e 75 | MENU fo|r a menu|
|000011c0| 22 0d 06 b8 0d 20 20 c9 | 20 6d 61 69 6e 25 0d 06 |".... .| main%..|
|000011d0| c2 5a 20 73 65 6e 64 68 | 65 6c 70 24 3d 22 54 68 |.Z sendh|elp$="Th|
|000011e0| 69 73 20 69 73 20 74 68 | 65 20 6d 61 69 6e 20 77 |is is th|e main w|
|000011f0| 69 6e 64 6f 77 20 6f 66 | 20 53 6f 6c 76 65 72 7c |indow of| Solver||
|00001200| 4d 42 79 20 44 20 42 72 | 61 64 73 68 61 77 7c 4d |MBy D Br|adshaw|M|
|00001210| a9 20 41 72 63 68 69 6d | 65 64 65 73 20 57 6f 72 |. Archim|edes Wor|
|00001220| 6c 64 20 31 39 39 33 22 | 0d 06 cc 1a 20 20 20 c8 |ld 1993"|.... .|
|00001230| 8e 20 77 69 6d 70 5f 62 | 6c 6f 63 6b 25 21 33 36 |. wimp_b|lock%!36|
|00001240| 20 ca 0d 06 d6 30 20 20 | 20 c9 20 32 36 2c 32 38 | ....0 | . 26,28|
|00001250| 2c 33 30 2c 33 32 2c 33 | 34 2c 33 36 2c 33 38 2c |,30,32,3|4,36,38,|
|00001260| 34 30 2c 34 32 3a 73 65 | 6e 64 68 65 6c 70 24 3d |40,42:se|ndhelp$=|
|00001270| 22 22 0d 06 e0 30 20 20 | 20 c9 20 32 37 2c 32 39 |""...0 | . 27,29|
|00001280| 2c 33 31 2c 33 33 2c 33 | 35 2c 33 37 2c 33 39 2c |,31,33,3|5,37,39,|
|00001290| 34 31 2c 34 33 3a 73 65 | 6e 64 68 65 6c 70 24 3d |41,43:se|ndhelp$=|
|000012a0| 22 22 0d 06 ea 07 20 20 | cb 0d 06 f4 06 20 cb 0d |"".... |..... ..|
|000012b0| 06 fe 20 20 24 28 77 69 | 6d 70 5f 62 6c 6f 63 6b |.. $(wi|mp_block|
|000012c0| 25 2b 32 30 29 3d 73 65 | 6e 64 68 65 6c 70 24 0d |%+20)=se|ndhelp$.|
|000012d0| 07 08 36 20 c8 99 22 57 | 69 6d 70 5f 53 65 6e 64 |..6 .."W|imp_Send|
|000012e0| 4d 65 73 73 61 67 65 22 | 2c 31 37 2c 77 69 6d 70 |Message"|,17,wimp|
|000012f0| 5f 62 6c 6f 63 6b 25 2c | 77 69 6d 70 5f 62 6c 6f |_block%,|wimp_blo|
|00001300| 63 6b 25 21 34 0d 07 12 | 06 20 e1 0d 07 1c 1f 20 |ck%!4...|. ..... |
|00001310| dd f2 72 65 70 6f 72 74 | 65 72 72 6f 72 28 45 4e |..report|error(EN|
|00001320| 2c 45 24 2c 66 61 74 61 | 6c 29 0d 07 26 1e 20 21 |,E$,fata|l)..&. !|
|00001330| 67 73 70 61 63 65 3d 45 | 4e 3a 24 28 67 73 70 61 |gspace=E|N:$(gspa|
|00001340| 63 65 2b 34 29 3d 45 24 | 0d 07 30 32 20 c8 99 22 |ce+4)=E$|..02 .."|
|00001350| 57 69 6d 70 5f 52 65 70 | 6f 72 74 45 72 72 6f 72 |Wimp_Rep|ortError|
|00001360| 22 2c 67 73 70 61 63 65 | 2c 31 31 2c 22 53 6f 6c |",gspace|,11,"Sol|
|00001370| 76 65 72 22 20 b8 20 2c | 72 73 0d 07 3a 1c 20 e7 |ver" . ,|rs..:. .|
|00001380| 20 72 73 3d 32 20 84 20 | 66 61 74 61 6c 3d b9 20 | rs=2 . |fatal=. |
|00001390| 8c 20 f2 64 69 65 0d 07 | 44 06 20 e1 0d 07 4e 1a |. .die..|D. ...N.|
|000013a0| 20 dd f2 6f 70 65 6e 77 | 69 6e 64 6f 77 28 68 61 | ..openw|indow(ha|
|000013b0| 6e 64 6c 65 25 29 0d 07 | 58 25 20 c8 99 22 57 69 |ndle%)..|X% .."Wi|
|000013c0| 6d 70 5f 4f 70 65 6e 57 | 69 6e 64 6f 77 22 2c 2c |mp_OpenW|indow",,|
|000013d0| 77 69 6d 70 5f 62 6c 6f | 63 6b 25 0d 07 62 06 20 |wimp_blo|ck%..b. |
|000013e0| e1 0d 07 6c 10 20 dd f2 | 63 6c 6f 73 65 6d 61 69 |...l. ..|closemai|
|000013f0| 6e 0d 07 76 2f 20 21 67 | 73 70 61 63 65 3d 6d 61 |n..v/ !g|space=ma|
|00001400| 69 6e 25 3a c8 99 22 57 | 69 6d 70 5f 43 6c 6f 73 |in%:.."W|imp_Clos|
|00001410| 65 57 69 6e 64 6f 77 22 | 2c 2c 67 73 70 61 63 65 |eWindow"|,,gspace|
|00001420| 0d 07 80 06 20 e1 0d 07 | 8a 04 0d 07 94 2d 20 dd |.... ...|.....- .|
|00001430| a4 63 6f 6e 73 74 72 75 | 63 74 5f 6d 65 6e 75 28 |.constru|ct_menu(|
|00001440| 6d 65 6d 2c 74 65 78 74 | 24 2c 74 69 74 6c 65 24 |mem,text|$,title$|
|00001450| 2c 77 69 64 74 68 29 0d | 07 9e 0a 20 65 6e 64 3d |,width).|... end=|
|00001460| a3 0d 07 a8 10 20 24 6d | 65 6d 3d 74 69 74 6c 65 |..... $m|em=title|
|00001470| 24 0d 07 b2 11 20 6d 65 | 6d 3f 31 32 20 20 20 3d |$.... me|m?12 =|
|00001480| 20 37 0d 07 bc 11 20 6d | 65 6d 3f 31 33 20 20 20 | 7.... m|em?13 |
|00001490| 3d 20 32 0d 07 c6 11 20 | 6d 65 6d 3f 31 34 20 20 |= 2.... |mem?14 |
|000014a0| 20 3d 20 37 0d 07 d0 11 | 20 6d 65 6d 3f 31 35 20 | = 7....| mem?15 |
|000014b0| 20 20 3d 20 30 0d 07 da | 15 20 6d 65 6d 21 31 36 | = 0...|. mem!16|
|000014c0| 20 20 20 3d 20 77 69 64 | 74 68 0d 07 e4 12 20 6d | = wid|th.... m|
|000014d0| 65 6d 21 32 30 20 20 20 | 3d 20 34 34 0d 07 ee 11 |em!20 |= 44....|
|000014e0| 20 6d 65 6d 21 32 34 20 | 20 20 3d 20 30 0d 07 f8 | mem!24 | = 0...|
|000014f0| 12 20 6d 65 6d 70 74 72 | 3d 6d 65 6d 2b 32 38 0d |. memptr|=mem+28.|
|00001500| 08 02 06 20 f5 0d 08 0c | 14 20 70 6f 73 3d a7 74 |... ....|. pos=.t|
|00001510| 65 78 74 24 2c 22 2c 22 | 29 0d 08 16 17 20 74 24 |ext$,","|).... t$|
|00001520| 3d c0 74 65 78 74 24 2c | 28 70 6f 73 2d 31 29 29 |=.text$,|(pos-1))|
|00001530| 0d 08 20 21 20 74 65 78 | 74 24 3d c2 74 65 78 74 |.. ! tex|t$=.text|
|00001540| 24 2c 28 a9 28 74 65 78 | 74 24 29 2d 70 6f 73 29 |$,(.(tex|t$)-pos)|
|00001550| 29 0d 08 2a 0b 20 66 6c | 67 25 3d 30 0d 08 34 0e |)..*. fl|g%=0..4.|
|00001560| 20 73 75 62 70 74 72 3d | 2d 31 0d 08 3e 11 20 69 | subptr=|-1..>. i|
|00001570| 6e 64 69 72 65 63 74 65 | 64 3d a3 0d 08 48 14 20 |ndirecte|d=...H. |
|00001580| 66 6c 61 67 73 3d 26 30 | 37 30 30 30 30 32 31 0d |flags=&0|7000021.|
|00001590| 08 52 11 20 20 c8 8e 20 | c0 74 24 2c 31 29 20 ca |.R. .. |.t$,1) .|
|000015a0| 0d 08 5c 19 20 20 20 c9 | 20 22 5f 22 3a 20 f2 6f |..\. .| "_": .o|
|000015b0| 72 66 6c 61 67 73 28 32 | 29 0d 08 66 19 20 20 20 |rflags(2|)..f. |
|000015c0| c9 20 22 60 22 3a 20 f2 | 6f 72 66 6c 61 67 73 28 |. "`": .|orflags(|
|000015d0| 31 29 0d 08 70 0c 20 20 | 20 c9 20 22 a4 22 0d 08 |1)..p. | . "."..|
|000015e0| 7a 13 20 20 20 20 f2 6f | 72 66 6c 61 67 73 28 34 |z. .o|rflags(4|
|000015f0| 29 0d 08 84 17 20 20 20 | 20 70 6f 73 3d a7 74 65 |).... | pos=.te|
|00001600| 78 74 24 2c 22 2c 22 29 | 0d 08 8e 1b 20 20 20 20 |xt$,",")|.... |
|00001610| 70 74 24 3d c0 74 65 78 | 74 24 2c 28 70 6f 73 2d |pt$=.tex|t$,(pos-|
|00001620| 31 29 29 0d 08 98 24 20 | 20 20 20 74 65 78 74 24 |1))...$ | text$|
|00001630| 3d c2 74 65 78 74 24 2c | 28 a9 28 74 65 78 74 24 |=.text$,|(.(text$|
|00001640| 29 2d 70 6f 73 29 29 0d | 08 a2 14 20 20 20 20 69 |)-pos)).|... i|
|00001650| 6e 64 69 72 65 63 74 65 | 64 3d b9 0d 08 ac 14 20 |ndirecte|d=..... |
|00001660| 20 20 20 62 75 66 66 25 | 3d a0 28 70 74 24 29 0d | buff%|=.(pt$).|
|00001670| 08 b6 17 20 20 20 20 70 | 6f 73 3d a7 74 65 78 74 |... p|os=.text|
|00001680| 24 2c 22 2c 22 29 0d 08 | c0 1b 20 20 20 20 70 74 |$,",")..|.. pt|
|00001690| 24 3d c0 74 65 78 74 24 | 2c 28 70 6f 73 2d 31 29 |$=.text$|,(pos-1)|
|000016a0| 29 0d 08 ca 24 20 20 20 | 20 74 65 78 74 24 3d c2 |)...$ | text$=.|
|000016b0| 74 65 78 74 24 2c 28 a9 | 28 74 65 78 74 24 29 2d |text$,(.|(text$)-|
|000016c0| 70 6f 73 29 29 0d 08 d4 | 15 20 20 20 20 6c 65 6e |pos))...|. len|
|000016d0| 67 74 68 3d a0 28 70 74 | 24 29 0d 08 de 17 20 20 |gth=.(pt|$).... |
|000016e0| 20 20 70 6f 73 3d a7 74 | 65 78 74 24 2c 22 2c 22 | pos=.t|ext$,","|
|000016f0| 29 0d 08 e8 1b 20 20 20 | 20 70 74 24 3d c0 74 65 |).... | pt$=.te|
|00001700| 78 74 24 2c 28 70 6f 73 | 2d 31 29 29 0d 08 f2 24 |xt$,(pos|-1))...$|
|00001710| 20 20 20 20 74 65 78 74 | 24 3d c2 74 65 78 74 24 | text|$=.text$|
|00001720| 2c 28 a9 28 74 65 78 74 | 24 29 2d 70 6f 73 29 29 |,(.(text|$)-pos))|
|00001730| 0d 08 fc 15 20 20 20 20 | 76 61 6c 70 74 72 3d a0 |.... |valptr=.|
|00001740| 28 70 74 24 29 0d 09 06 | 17 20 20 20 20 66 6c 61 |(pt$)...|. fla|
|00001750| 67 73 3d 26 30 37 30 30 | 46 31 32 31 0d 09 10 0c |gs=&0700|F121....|
|00001760| 20 20 20 c9 20 22 3e 22 | 0d 09 1a 17 20 20 20 20 | . ">"|.... |
|00001770| 70 6f 73 3d a7 74 65 78 | 74 24 2c 22 2c 22 29 0d |pos=.tex|t$,",").|
|00001780| 09 24 1b 20 20 20 20 70 | 74 24 3d c0 74 65 78 74 |.$. p|t$=.text|
|00001790| 24 2c 28 70 6f 73 2d 31 | 29 29 0d 09 2e 24 20 20 |$,(pos-1|))...$ |
|000017a0| 20 20 74 65 78 74 24 3d | c2 74 65 78 74 24 2c 28 | text$=|.text$,(|
|000017b0| a9 28 74 65 78 74 24 29 | 2d 70 6f 73 29 29 0d 09 |.(text$)|-pos))..|
|000017c0| 38 15 20 20 20 20 73 75 | 62 70 74 72 3d a0 28 70 |8. su|bptr=.(p|
|000017d0| 74 24 29 0d 09 42 13 20 | 20 20 20 f2 6f 72 66 6c |t$)..B. | .orfl|
|000017e0| 61 67 73 28 30 29 0d 09 | 4c 07 20 20 cb 0d 09 56 |ags(0)..|L. ...V|
|000017f0| 29 20 e7 20 a9 28 74 65 | 78 74 24 29 3c 31 20 8c |) . .(te|xt$)<1 .|
|00001800| 20 66 6c 67 25 3d 66 6c | 67 25 20 84 20 31 32 38 | flg%=fl|g% . 128|
|00001810| 3a 65 6e 64 3d b9 0d 09 | 60 15 20 6d 65 6d 70 74 |:end=...|`. mempt|
|00001820| 72 21 30 20 20 3d 20 66 | 6c 67 25 0d 09 6a 17 20 |r!0 = f|lg%..j. |
|00001830| 6d 65 6d 70 74 72 21 34 | 20 20 3d 20 73 75 62 70 |memptr!4| = subp|
|00001840| 74 72 0d 09 74 16 20 6d | 65 6d 70 74 72 21 38 20 |tr..t. m|emptr!8 |
|00001850| 20 3d 20 66 6c 61 67 73 | 0d 09 7e 14 20 c8 8e 20 | = flags|..~. .. |
|00001860| 69 6e 64 69 72 65 63 74 | 65 64 20 ca 0d 09 88 1a |indirect|ed .....|
|00001870| 20 20 c9 20 a3 20 3a 24 | 28 6d 65 6d 70 74 72 2b | . . :$|(memptr+|
|00001880| 31 32 29 3d 74 24 0d 09 | 92 09 20 20 c9 20 b9 0d |12)=t$..|.. . ..|
|00001890| 09 9c 16 20 20 20 6d 65 | 6d 70 74 72 21 31 32 3d |... me|mptr!12=|
|000018a0| 62 75 66 66 25 0d 09 a6 | 17 20 20 20 6d 65 6d 70 |buff%...|. memp|
|000018b0| 74 72 21 31 36 3d 76 61 | 6c 70 74 72 0d 09 b0 17 |tr!16=va|lptr....|
|000018c0| 20 20 20 6d 65 6d 70 74 | 72 21 32 30 3d 6c 65 6e | mempt|r!20=len|
|000018d0| 67 74 68 0d 09 ba 06 20 | cb 0d 09 c4 15 20 6d 65 |gth.... |..... me|
|000018e0| 6d 70 74 72 3d 6d 65 6d | 70 74 72 2b 32 34 0d 09 |mptr=mem|ptr+24..|
|000018f0| ce 0c 20 fd 20 65 6e 64 | 3d b9 0d 09 d8 09 20 3d |.. . end|=..... =|
|00001900| 6d 65 6d 0d 09 e2 04 0d | 09 ec 1f 20 dd f2 6d 65 |mem.....|... ..me|
|00001910| 6e 75 5f 61 74 28 68 61 | 6e 64 6c 65 25 2c 4e 2c |nu_at(ha|ndle%,N,|
|00001920| 6d 78 2c 6d 79 29 0d 09 | f6 18 20 63 75 72 72 65 |mx,my)..|.. curre|
|00001930| 6e 74 6d 65 6e 75 3d 68 | 61 6e 64 6c 65 25 0d 0a |ntmenu=h|andle%..|
|00001940| 00 27 20 c8 99 22 57 69 | 6d 70 5f 43 72 65 61 74 |.' .."Wi|mp_Creat|
|00001950| 65 4d 65 6e 75 22 2c 2c | 68 61 6e 64 6c 65 25 2c |eMenu",,|handle%,|
|00001960| 6d 78 2c 6d 79 0d 0a 0a | 06 20 e1 0d 0a 14 12 20 |mx,my...|. ..... |
|00001970| dd f2 6f 72 66 6c 61 67 | 73 28 6f 76 29 0d 0a 1e |..orflag|s(ov)...|
|00001980| 13 20 66 6c 67 25 3d 66 | 6c 67 25 20 84 20 6f 76 |. flg%=f|lg% . ov|
|00001990| 0d 0a 28 16 20 74 24 3d | c2 74 24 2c 28 a9 28 74 |..(. t$=|.t$,(.(t|
|000019a0| 24 29 2d 31 29 29 0d 0a | 32 06 20 e1 0d 0a 3c 04 |$)-1))..|2. ...<.|
|000019b0| 0d 0a 46 27 dd a4 69 63 | 6f 6e 62 61 72 28 73 70 |..F'..ic|onbar(sp|
|000019c0| 6e 61 6d 65 24 2c 62 6c | 6f 63 6b 25 2c 49 54 24 |name$,bl|ock%,IT$|
|000019d0| 2c 77 6e 64 77 25 29 0d | 0a 50 13 de 20 74 70 25 |,wndw%).|.P.. tp%|
|000019e0| 20 35 30 2c 76 70 25 20 | 35 30 0d 0a 5a 0c 24 74 | 50,vp% |50..Z.$t|
|000019f0| 70 25 3d 49 54 24 0d 0a | 64 14 24 76 70 25 3d 22 |p%=IT$..|d.$vp%="|
|00001a00| 53 22 2b 73 70 6e 61 6d | 65 24 0d 0a 6e 0d ea 20 |S"+spnam|e$..n.. |
|00001a10| 68 61 6e 64 6c 65 25 0d | 0a 78 15 24 62 6c 6f 63 |handle%.|.x.$bloc|
|00001a20| 6b 25 20 3d 20 73 70 6e | 61 6d 65 24 0d 0a 82 1a |k% = spn|ame$....|
|00001a30| 77 69 6d 70 5f 62 6c 6f | 63 6b 25 21 30 20 20 3d |wimp_blo|ck%!0 =|
|00001a40| 20 77 6e 64 77 25 0d 0a | 8c 17 77 69 6d 70 5f 62 | wndw%..|..wimp_b|
|00001a50| 6c 6f 63 6b 25 21 34 20 | 20 3d 20 20 30 0d 0a 96 |lock%!4 | = 0...|
|00001a60| 17 77 69 6d 70 5f 62 6c | 6f 63 6b 25 21 38 20 20 |.wimp_bl|ock%!8 |
|00001a70| 3d 20 20 30 0d 0a a0 17 | 77 69 6d 70 5f 62 6c 6f |= 0....|wimp_blo|
|00001a80| 63 6b 25 21 31 32 20 3d | 20 37 30 0d 0a aa 17 77 |ck%!12 =| 70....w|
|00001a90| 69 6d 70 5f 62 6c 6f 63 | 6b 25 21 31 36 20 3d 20 |imp_bloc|k%!16 = |
|00001aa0| 36 38 0d 0a b4 1e 77 69 | 6d 70 5f 62 6c 6f 63 6b |68....wi|mp_block|
|00001ab0| 25 21 32 30 20 3d 20 26 | 31 37 30 30 33 30 33 41 |%!20 = &|1700303A|
|00001ac0| 0d 0a be 1d 24 28 77 69 | 6d 70 5f 62 6c 6f 63 6b |....$(wi|mp_block|
|00001ad0| 25 2b 32 34 29 3d 73 70 | 6e 61 6d 65 24 0d 0a c8 |%+24)=sp|name$...|
|00001ae0| 31 c8 99 20 22 58 57 69 | 6d 70 5f 43 72 65 61 74 |1.. "XWi|mp_Creat|
|00001af0| 65 49 63 6f 6e 22 2c 30 | 2c 77 69 6d 70 5f 62 6c |eIcon",0|,wimp_bl|
|00001b00| 6f 63 6b 25 20 b8 20 68 | 61 6e 64 6c 65 25 0d 0a |ock% . h|andle%..|
|00001b10| d2 0c 3d 68 61 6e 64 6c | 65 25 0d 0a dc 18 20 dd |..=handl|e%.... .|
|00001b20| f2 6e 65 77 74 65 78 74 | 28 77 25 2c 69 25 2c 74 |.newtext|(w%,i%,t|
|00001b30| 24 29 0d 0a e6 3a 20 67 | 73 70 61 63 65 21 30 3d |$)...: g|space!0=|
|00001b40| 77 25 3a 67 73 70 61 63 | 65 21 34 3d 69 25 3a c8 |w%:gspac|e!4=i%:.|
|00001b50| 99 22 57 69 6d 70 5f 47 | 65 74 49 63 6f 6e 53 74 |."Wimp_G|etIconSt|
|00001b60| 61 74 65 22 2c 2c 67 73 | 70 61 63 65 0d 0a f0 14 |ate",,gs|pace....|
|00001b70| 20 24 28 67 73 70 61 63 | 65 21 32 38 29 3d 74 24 | $(gspac|e!28)=t$|
|00001b80| 0d 0a fa 15 20 f2 75 70 | 64 61 74 65 69 74 28 77 |.... .up|dateit(w|
|00001b90| 25 2c 69 25 29 0d 0b 04 | 06 20 e1 0d 0b 0e 14 dd |%,i%)...|. ......|
|00001ba0| a4 67 65 74 74 65 78 74 | 28 77 25 2c 69 25 29 0d |.gettext|(w%,i%).|
|00001bb0| 0b 18 35 21 62 75 66 66 | 25 3d 77 25 3a 62 75 66 |..5!buff|%=w%:buf|
|00001bc0| 66 25 21 34 3d 69 25 3a | c8 99 22 57 69 6d 70 5f |f%!4=i%:|.."Wimp_|
|00001bd0| 47 65 74 49 63 6f 6e 53 | 74 61 74 65 22 2c 2c 62 |GetIconS|tate",,b|
|00001be0| 75 66 66 25 0d 0b 22 10 | 3d 24 28 62 75 66 66 25 |uff%..".|=$(buff%|
|00001bf0| 21 32 38 29 0d 0b 2c 06 | 20 e1 0d 0b 36 06 20 e1 |!28)..,.| ...6. .|
|00001c00| 0d 0b 40 12 20 dd f2 67 | 65 74 65 71 75 61 74 69 |..@. ..g|etequati|
|00001c10| 6f 6e 0d 0b 4a 0b 20 73 | 69 64 65 3d 31 0d 0b 54 |on..J. s|ide=1..T|
|00001c20| 0c 20 73 74 61 72 74 3d | 31 0d 0b 5e 19 20 46 24 |. start=|1..^. F$|
|00001c30| 3d a4 67 65 74 74 65 78 | 74 28 6d 61 69 6e 25 2c |=.gettex|t(main%,|
|00001c40| 33 29 0d 0b 68 5a 20 e7 | 20 a7 46 24 2c 22 3d 22 |3)..hZ .| .F$,"="|
|00001c50| 29 3d 30 20 f2 72 65 70 | 6f 72 74 65 72 72 6f 72 |)=0 .rep|orterror|
|00001c60| 28 31 32 38 2c 22 54 68 | 65 72 65 20 6d 75 73 74 |(128,"Th|ere must|
|00001c70| 20 62 65 20 74 77 6f 20 | 73 69 64 65 73 20 74 6f | be two |sides to|
|00001c80| 20 74 68 65 20 65 71 75 | 61 74 69 6f 6e 21 22 2c | the equ|ation!",|
|00001c90| 30 29 3a 65 6e 74 65 72 | 3d a3 3a e1 0d 0b 72 0f |0):enter|=.:...r.|
|00001ca0| 20 51 3d a7 46 24 2c 22 | 3d 22 29 0d 0b 7c 14 20 | Q=.F$,"|=")..|. |
|00001cb0| 73 69 64 65 31 24 3d c0 | 46 24 2c 51 2d 31 29 0d |side1$=.|F$,Q-1).|
|00001cc0| 0b 86 28 20 73 69 64 65 | 32 24 3d c1 46 24 2c 51 |..( side|2$=.F$,Q|
|00001cd0| 2b 31 2c 28 a9 28 46 24 | 29 2d a9 28 73 69 64 65 |+1,(.(F$|)-.(side|
|00001ce0| 31 24 29 2d 31 29 29 0d | 0b 90 29 20 e7 20 c0 73 |1$)-1)).|..) . .s|
|00001cf0| 69 64 65 32 24 2c 31 29 | 3d 22 2d 22 20 8c 20 73 |ide2$,1)|="-" . s|
|00001d00| 69 64 65 32 24 3d 22 30 | 22 2b 73 69 64 65 32 24 |ide2$="0|"+side2$|
|00001d10| 0d 0b 9a 29 20 e7 20 c0 | 73 69 64 65 32 24 2c 31 |...) . .|side2$,1|
|00001d20| 29 3d 22 2b 22 20 8c 20 | 73 69 64 65 32 24 3d 22 |)="+" . |side2$="|
|00001d30| 30 22 2b 73 69 64 65 32 | 24 0d 0b a4 19 20 46 24 |0"+side2|$.... F$|
|00001d40| 3d 73 69 64 65 31 24 2b | 22 3d 22 2b 73 69 64 65 |=side1$+|"="+side|
|00001d50| 32 24 0d 0b ae 06 20 f5 | 0d 0b b8 25 20 e7 20 c0 |2$.... .|...% . .|
|00001d60| 46 24 2c 31 29 3d 22 20 | 22 20 8c 20 46 24 3d c2 |F$,1)=" |" . F$=.|
|00001d70| 46 24 2c 28 a9 28 46 24 | 29 2d 31 29 29 0d 0b c2 |F$,(.(F$|)-1))...|
|00001d80| 12 20 fd 20 c0 46 24 2c | 31 29 3c 3e 22 20 22 0d |. . .F$,|1)<>" ".|
|00001d90| 0b cc 0e 20 46 24 3d 46 | 24 2b 22 2e 22 0d 0b d6 |... F$=F|$+"."...|
|00001da0| 40 20 65 71 28 31 2c 30 | 29 3d 30 3a 65 71 28 31 |@ eq(1,0|)=0:eq(1|
|00001db0| 2c 31 29 3d 30 3a 65 71 | 28 31 2c 32 29 3d 30 3a |,1)=0:eq|(1,2)=0:|
|00001dc0| 65 71 28 32 2c 30 29 3d | 30 3a 65 71 28 32 2c 31 |eq(2,0)=|0:eq(2,1|
|00001dd0| 29 3d 30 3a 65 71 28 32 | 2c 32 29 3d 30 0d 0b e0 |)=0:eq(2|,2)=0...|
|00001de0| 0a 20 70 74 72 3d 31 0d | 0b ea 1f 20 6e 65 67 28 |. ptr=1.|... neg(|
|00001df0| 31 29 3d a3 3a 6e 65 67 | 28 32 29 3d a3 3a 6e 65 |1)=.:neg|(2)=.:ne|
|00001e00| 67 28 30 29 3d a3 0d 0b | f4 09 20 6e 73 3d a3 0d |g(0)=...|.. ns=..|
|00001e10| 0b fe 13 20 73 69 64 65 | 3d 31 3a 73 74 61 72 74 |... side|=1:start|
|00001e20| 3d 31 0d 0c 08 0a 20 4e | 24 3d 22 22 0d 0c 12 46 |=1.... N|$=""...F|
|00001e30| 20 e7 20 97 28 c1 46 24 | 2c 70 74 72 2c 31 29 29 | . .(.F$|,ptr,1))|
|00001e40| 3e 34 37 20 80 20 97 28 | c1 46 24 2c 70 74 72 2c |>47 . .(|.F$,ptr,|
|00001e50| 31 29 29 3c 35 38 20 8c | 20 4e 24 3d 4e 24 2b c1 |1))<58 .| N$=N$+.|
|00001e60| 46 24 2c 70 74 72 2c 31 | 29 3a 8b 20 e5 20 8d 54 |F$,ptr,1|):. . .T|
|00001e70| 66 4c 0d 0c 1c 15 20 70 | 74 72 3d 70 74 72 2b 31 |fL.... p|tr=ptr+1|
|00001e80| 3a e5 20 8d 54 52 4c 0d | 0c 26 1e 20 e7 20 4e 24 |:. .TRL.|.&. . N$|
|00001e90| 3d 22 22 20 84 20 4e 24 | 3d 22 20 22 20 8c 20 4e |="" . N$|=" " . N|
|00001ea0| 24 3d 22 31 22 0d 0c 30 | 17 20 e7 20 4e 24 3d 22 |$="1"..0|. . N$="|
|00001eb0| 2d 22 20 8c 20 4e 24 3d | 22 2d 31 22 0d 0c 3a 14 |-" . N$=|"-1"..:.|
|00001ec0| 20 c8 8e 20 c1 46 24 2c | 70 74 72 2c 31 29 20 ca | .. .F$,|ptr,1) .|
|00001ed0| 0d 0c 44 3e 20 c9 20 22 | 2d 22 3a 65 71 28 73 69 |..D> . "|-":eq(si|
|00001ee0| 64 65 2c 30 29 3d 65 71 | 28 73 69 64 65 2c 30 29 |de,0)=eq|(side,0)|
|00001ef0| 2b a0 28 4e 24 29 3a 4e | 24 3d 22 2d 22 3a 70 74 |+.(N$):N|$="-":pt|
|00001f00| 72 3d 70 74 72 2b 31 3a | e5 20 8d 54 52 4c 0d 0c |r=ptr+1:|. .TRL..|
|00001f10| 4e 2d 20 c9 20 22 2e 22 | 3a 65 71 28 73 69 64 65 |N- . "."|:eq(side|
|00001f20| 2c 30 29 3d 65 71 28 73 | 69 64 65 2c 30 29 2b a0 |,0)=eq(s|ide,0)+.|
|00001f30| 28 4e 24 29 3a e5 20 8d | 74 72 4c 0d 0c 58 2a 20 |(N$):. .|trL..X* |
|00001f40| c9 20 22 2b 22 3a 65 71 | 28 73 69 64 65 2c 30 29 |. "+":eq|(side,0)|
|00001f50| 2b 3d a0 28 4e 24 29 3a | 70 74 72 2b 3d 31 3a e5 |+=.(N$):|ptr+=1:.|
|00001f60| 20 8d 54 48 4c 0d 0c 62 | 34 20 c9 20 22 3d 22 3a | .THL..b|4 . "=":|
|00001f70| 65 71 28 73 69 64 65 2c | 30 29 2b 3d a0 28 4e 24 |eq(side,|0)+=.(N$|
|00001f80| 29 3a 73 69 64 65 3d 32 | 3a 70 74 72 3d 70 74 72 |):side=2|:ptr=ptr|
|00001f90| 2b 31 3a e5 20 8d 54 48 | 4c 0d 0c 6c 0a 20 c9 20 |+1:. .TH|L..l. . |
|00001fa0| 22 78 22 0d 0c 76 17 20 | 20 c8 8e 20 c1 46 24 2c |"x"..v. | .. .F$,|
|00001fb0| 70 74 72 2b 31 2c 31 29 | 20 ca 0d 0c 80 a5 20 20 |ptr+1,1)| ..... |
|00001fc0| c9 20 22 32 22 3a 65 71 | 28 73 69 64 65 2c 32 29 |. "2":eq|(side,2)|
|00001fd0| 2b 3d a0 28 4e 24 29 3a | 70 74 72 3d 70 74 72 2b |+=.(N$):|ptr=ptr+|
|00001fe0| 32 3a e7 20 c1 46 24 2c | 70 74 72 2c 31 29 3d 22 |2:. .F$,|ptr,1)="|
|00001ff0| 2d 22 20 8c 20 4e 24 3d | 22 2d 22 3a 70 74 72 3d |-" . N$=|"-":ptr=|
|00002000| 70 74 72 2b 31 3a e5 20 | 8d 54 52 4c 3a 8b 20 e7 |ptr+1:. |.TRL:. .|
|00002010| 20 c1 46 24 2c 70 74 72 | 2c 31 29 3d 22 2b 22 20 | .F$,ptr|,1)="+" |
|00002020| 8c 20 70 74 72 3d 70 74 | 72 2b 31 3a e5 20 8d 54 |. ptr=pt|r+1:. .T|
|00002030| 48 4c 3a 8b 20 e7 20 c1 | 46 24 2c 70 74 72 2c 31 |HL:. . .|F$,ptr,1|
|00002040| 29 3d 22 3d 22 20 8c 20 | 70 74 72 3d 70 74 72 2b |)="=" . |ptr=ptr+|
|00002050| 31 3a 73 69 64 65 3d 32 | 3a e5 20 8d 54 48 4c 0d |1:side=2|:. .THL.|
|00002060| 0c 8a a1 20 20 7f 20 65 | 71 28 73 69 64 65 2c 31 |... . e|q(side,1|
|00002070| 29 2b 3d a0 28 4e 24 29 | 3a 70 74 72 3d 70 74 72 |)+=.(N$)|:ptr=ptr|
|00002080| 2b 31 3a e7 20 c1 46 24 | 2c 70 74 72 2c 31 29 3d |+1:. .F$|,ptr,1)=|
|00002090| 22 2d 22 20 8c 20 4e 24 | 3d 22 2d 22 3a 70 74 72 |"-" . N$|="-":ptr|
|000020a0| 3d 70 74 72 2b 31 3a e5 | 20 8d 54 52 4c 3a 8b 20 |=ptr+1:.| .TRL:. |
|000020b0| e7 20 c1 46 24 2c 70 74 | 72 2c 31 29 3d 22 2b 22 |. .F$,pt|r,1)="+"|
|000020c0| 20 8c 20 70 74 72 3d 70 | 74 72 2b 31 3a e5 20 8d | . ptr=p|tr+1:. .|
|000020d0| 54 48 4c 3a 8b 20 e7 20 | c1 46 24 2c 70 74 72 2c |THL:. . |.F$,ptr,|
|000020e0| 31 29 3d 22 3d 22 20 8c | 20 70 74 72 3d 70 74 72 |1)="=" .| ptr=ptr|
|000020f0| 2b 31 3a 73 69 64 65 3d | 32 3a e5 20 8d 54 48 4c |+1:side=|2:. .THL|
|00002100| 0d 0c 94 07 20 20 cb 0d | 0c 9e 06 20 cb 0d 0c a8 |.... ..|... ....|
|00002110| 1b 20 e7 20 70 74 72 3c | a9 28 46 24 29 2d 31 20 |. . ptr<|.(F$)-1 |
|00002120| 8c 20 e5 20 8d 54 48 4c | 0d 0c b2 15 20 65 71 28 |. . .THL|.... eq(|
|00002130| 31 2c 30 29 2d 3d 65 71 | 28 32 2c 30 29 0d 0c bc |1,0)-=eq|(2,0)...|
|00002140| 15 20 65 71 28 31 2c 31 | 29 2d 3d 65 71 28 32 2c |. eq(1,1|)-=eq(2,|
|00002150| 31 29 0d 0c c6 15 20 65 | 71 28 31 2c 32 29 2d 3d |1).... e|q(1,2)-=|
|00002160| 65 71 28 32 2c 32 29 0d | 0c d0 1b 20 e7 20 65 71 |eq(2,2).|... . eq|
|00002170| 28 31 2c 31 29 3c 30 20 | 8c 20 6e 65 67 28 31 29 |(1,1)<0 |. neg(1)|
|00002180| 3d b9 0d 0c da 1b 20 e7 | 20 65 71 28 31 2c 30 29 |=..... .| eq(1,0)|
|00002190| 3c 30 20 8c 20 6e 65 67 | 28 30 29 3d b9 0d 0c e4 |<0 . neg|(0)=....|
|000021a0| 1b 20 e7 20 65 71 28 31 | 2c 32 29 3c 30 20 8c 20 |. . eq(1|,2)<0 . |
|000021b0| 6e 65 67 28 32 29 3d b9 | 0d 0c ee 18 20 46 24 3d |neg(2)=.|.... F$=|
|000021c0| c3 28 65 71 28 31 2c 32 | 29 29 2b 22 78 b2 20 22 |.(eq(1,2|))+"x. "|
|000021d0| 0d 0c f8 29 20 e7 20 6e | 65 67 28 31 29 3d a3 20 |...) . n|eg(1)=. |
|000021e0| 8c 20 46 24 3d 46 24 2b | 22 2b 20 22 3a 8b 20 46 |. F$=F$+|"+ ":. F|
|000021f0| 24 3d 46 24 2b 22 2d 20 | 22 0d 0d 02 1d 20 46 24 |$=F$+"- |".... F$|
|00002200| 3d 46 24 2b c3 28 94 28 | 65 71 28 31 2c 31 29 29 |=F$+.(.(|eq(1,1))|
|00002210| 29 2b 22 78 20 22 0d 0d | 0c 29 20 e7 20 6e 65 67 |)+"x "..|.) . neg|
|00002220| 28 30 29 3d a3 20 8c 20 | 46 24 3d 46 24 2b 22 2b |(0)=. . |F$=F$+"+|
|00002230| 20 22 3a 8b 20 46 24 3d | 46 24 2b 22 2d 20 22 0d | ":. F$=|F$+"- ".|
|00002240| 0d 16 1f 20 46 24 3d 46 | 24 2b c3 28 94 28 65 71 |... F$=F|$+.(.(eq|
|00002250| 28 31 2c 30 29 29 29 2b | 22 20 3d 20 30 22 0d 0d |(1,0)))+|" = 0"..|
|00002260| 20 19 20 f2 6e 65 77 74 | 65 78 74 28 6d 61 69 6e | . .newt|ext(main|
|00002270| 25 2c 35 2c 46 24 29 0d | 0d 2a 14 20 f2 64 69 73 |%,5,F$).|.*. .dis|
|00002280| 70 6c 61 79 72 65 73 75 | 6c 74 73 0d 0d 34 06 20 |playresu|lts..4. |
|00002290| e1 0d 0d 3e 15 20 dd f2 | 64 69 73 70 6c 61 79 72 |...>. ..|displayr|
|000022a0| 65 73 75 6c 74 73 0d 0d | 48 12 20 e7 20 65 6e 74 |esults..|H. . ent|
|000022b0| 65 72 3d a3 20 8c 20 e1 | 0d 0d 52 2c 20 51 3d 28 |er=. . .|..R, Q=(|
|000022c0| 65 71 28 31 2c 31 29 2a | 65 71 28 31 2c 31 29 2d |eq(1,1)*|eq(1,1)-|
|000022d0| 28 34 2a 65 71 28 31 2c | 32 29 2a 65 71 28 31 2c |(4*eq(1,|2)*eq(1,|
|000022e0| 30 29 29 29 0d 0d 5c 48 | 20 e7 20 51 3c 30 20 8c |0)))..\H| . Q<0 .|
|000022f0| 20 f2 6e 65 77 74 65 78 | 74 28 6d 61 69 6e 25 2c | .newtex|t(main%,|
|00002300| 37 2c 22 4e 6f 20 72 65 | 61 6c 22 29 3a f2 6e 65 |7,"No re|al"):.ne|
|00002310| 77 74 65 78 74 28 6d 61 | 69 6e 25 2c 38 2c 22 73 |wtext(ma|in%,8,"s|
|00002320| 6f 6c 75 74 69 6f 6e 73 | 22 29 3a e1 0d 0d 66 0e |olutions|"):...f.|
|00002330| 20 51 3d 51 5e 28 31 2f | 32 29 0d 0d 70 20 20 57 | Q=Q^(1/|2)..p W|
|00002340| 3d 28 30 2d 65 71 28 31 | 2c 31 29 2b 51 29 2f 28 |=(0-eq(1|,1)+Q)/(|
|00002350| 32 2a 65 71 28 31 2c 32 | 29 29 0d 0d 7a 20 20 45 |2*eq(1,2|))..z E|
|00002360| 3d 28 30 2d 65 71 28 31 | 2c 31 29 2d 51 29 2f 28 |=(0-eq(1|,1)-Q)/(|
|00002370| 32 2a 65 71 28 31 2c 32 | 29 29 0d 0d 84 0c 20 57 |2*eq(1,2|)).... W|
|00002380| 24 3d c3 28 57 29 0d 0d | 8e 0c 20 45 24 3d c3 28 |$=.(W)..|.. E$=.(|
|00002390| 45 29 0d 0d 98 0f 20 53 | 3d a7 57 24 2c 22 2e 22 |E).... S|=.W$,"."|
|000023a0| 29 0d 0d a2 0f 20 46 3d | a7 45 24 2c 22 2e 22 29 |).... F=|.E$,".")|
|000023b0| 0d 0d ac 19 20 e7 20 53 | 3c 32 20 84 20 46 3c 32 |.... . S|<2 . F<2|
|000023c0| 20 8c 20 e5 20 8d 64 5e | 4d 0d 0d b6 0e 20 53 3d | . . .d^|M.... S=|
|000023d0| a9 28 57 24 29 2d 53 0d | 0d c0 0e 20 46 3d a9 28 |.(W$)-S.|... F=.(|
|000023e0| 45 24 29 2d 46 0d 0d ca | 16 20 57 24 3d c0 57 24 |E$)-F...|. W$=.W$|
|000023f0| 2c a9 28 57 24 29 2d 53 | 2b 70 29 0d 0d d4 16 20 |,.(W$)-S|+p).... |
|00002400| 45 24 3d c0 45 24 2c a9 | 28 45 24 29 2d 46 2b 70 |E$=.E$,.|(E$)-F+p|
|00002410| 29 0d 0d de 20 20 f2 6e | 65 77 74 65 78 74 28 6d |)... .n|ewtext(m|
|00002420| 61 69 6e 25 2c 37 2c 22 | 78 20 3d 20 22 2b 45 24 |ain%,7,"|x = "+E$|
|00002430| 29 0d 0d e8 20 20 f2 6e | 65 77 74 65 78 74 28 6d |)... .n|ewtext(m|
|00002440| 61 69 6e 25 2c 38 2c 22 | 78 20 3d 20 22 2b 57 24 |ain%,8,"|x = "+W$|
|00002450| 29 0d 0d f2 06 20 e1 0d | 0d fc 08 20 f4 20 06 0d |).... ..|... . ..|
|00002460| 0e 06 19 20 dd f2 75 70 | 64 61 74 65 69 74 28 77 |... ..up|dateit(w|
|00002470| 69 6e 2c 69 63 6f 6e 29 | 0d 0e 10 16 20 e7 20 77 |in,icon)|.... . w|
|00002480| 69 6e 3d 2d 31 20 8c 20 | 77 69 6e 3d 2d 32 0d 0e |in=-1 . |win=-2..|
|00002490| 1a 15 20 21 77 69 6d 70 | 5f 62 6c 6f 63 6b 25 3d |.. !wimp|_block%=|
|000024a0| 77 69 6e 0d 0e 24 17 20 | 77 69 6d 70 5f 62 6c 6f |win..$. |wimp_blo|
|000024b0| 63 6b 25 21 34 3d 69 63 | 6f 6e 0d 0e 2e 25 20 77 |ck%!4=ic|on...% w|
|000024c0| 69 6d 70 5f 62 6c 6f 63 | 6b 25 21 38 3d 30 3a 77 |imp_bloc|k%!8=0:w|
|000024d0| 69 6d 70 5f 62 6c 6f 63 | 6b 25 21 31 32 3d 30 0d |imp_bloc|k%!12=0.|
|000024e0| 0e 38 27 20 c8 99 22 57 | 69 6d 70 5f 53 65 74 49 |.8' .."W|imp_SetI|
|000024f0| 63 6f 6e 53 74 61 74 65 | 22 2c 2c 77 69 6d 70 5f |conState|",,wimp_|
|00002500| 62 6c 6f 63 6b 25 0d 0e | 42 06 20 e1 0d 0e 4c 12 |block%..|B. ...L.|
|00002510| dd f2 74 69 63 6b 28 6d | 68 25 2c 49 25 29 0d 0e |..tick(m|h%,I%)..|
|00002520| 56 27 6d 68 25 21 28 32 | 38 2b 32 34 2a 49 25 29 |V'mh%!(2|8+24*I%)|
|00002530| 3d 6d 68 25 21 28 32 38 | 2b 32 34 2a 49 25 29 82 |=mh%!(28|+24*I%).|
|00002540| 26 30 31 3a e1 0d 0e 60 | 19 20 dd f2 75 70 64 61 |&01:...`|. ..upda|
|00002550| 74 65 69 74 28 77 69 6e | 2c 69 63 6f 6e 29 0d 0e |teit(win|,icon)..|
|00002560| 6a 16 20 e7 20 77 69 6e | 3d 2d 31 20 8c 20 77 69 |j. . win|=-1 . wi|
|00002570| 6e 3d 2d 32 0d 0e 74 15 | 20 21 77 69 6d 70 5f 62 |n=-2..t.| !wimp_b|
|00002580| 6c 6f 63 6b 25 3d 77 69 | 6e 0d 0e 7e 17 20 77 69 |lock%=wi|n..~. wi|
|00002590| 6d 70 5f 62 6c 6f 63 6b | 25 21 34 3d 69 63 6f 6e |mp_block|%!4=icon|
|000025a0| 0d 0e 88 25 20 77 69 6d | 70 5f 62 6c 6f 63 6b 25 |...% wim|p_block%|
|000025b0| 21 38 3d 30 3a 77 69 6d | 70 5f 62 6c 6f 63 6b 25 |!8=0:wim|p_block%|
|000025c0| 21 31 32 3d 30 0d 0e 92 | 27 20 c8 99 22 57 69 6d |!12=0...|' .."Wim|
|000025d0| 70 5f 53 65 74 49 63 6f | 6e 53 74 61 74 65 22 2c |p_SetIco|nState",|
|000025e0| 2c 77 69 6d 70 5f 62 6c | 6f 63 6b 25 0d 0e 9c 06 |,wimp_bl|ock%....|
|000025f0| 20 e1 0d ff | | ... | |
+--------+-------------------------+-------------------------+--------+--------+
